home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / C64 / A-Monthly Disks / (c)abe.d64 / witness in court (.txt) < prev   
Commodore BASIC  |  2007-02-04  |  17KB  |  466 lines
  1. 1 REM --------WITNESS BY: TYRALDO-----
  2. 3 REM A RUNNING WATER PRODUCTION
  3. 10 PRINT"[147]"
  4. 20 PRINT
  5. 30 PRINT"         WELCOME TO:"
  6. 40 PRINT"         WITNESS!!!"
  7. 50 PRINT:PRINT"        BY: TYRALDO"
  8. 60 PRINT:PRINT:PRINT
  9. 70 PRINT"GREETINGS! YOUR NAME, PLEASE?"
  10. 80 PRINT:INPUT"?";A$
  11. 90 PRINT"OK, "A$" PREPARE TO WITNESS A CRIME."
  12. 110 PRINT"IT IS A NICE SUNNY DAY AS YOU WALK ALONG MAIN STREET."
  13. 120 PRINT:PRINT"AH!!!":PRINT
  14. 130 PRINT"SUN SHINING...":PRINT
  15. 140 PRINT"BIRDS SINGING...":PRINT
  16. 150 PRINT"YOU ARE NOW AT A FORK IN THE ROAD."
  17. 160 PRINT"TO THE RIGHT IS THE BANK..."
  18. 170 PRINT"TO THE LEFT IS THE CITY COUNCIL."
  19. 180 PRINT"WHICH WAY?"
  20. 185 PRINT"PRESS (R) OR (L)."
  21. 190 INPUT"?";B$
  22. 200 IFB$=""THENGOTO190
  23. 210 IFB$="R"THENGOTO1000
  24. 220 IFB$="L"THENGOTO225
  25. 225 PRINT"YOU STAND SILENT FOR A MOMENT"
  26. 230 PRINT"AS YOU VIEW THE COUCIL BUILDING."
  27. 235 PRINT"AS YOU SHAKE YOUR HEAD THINKING"
  28. 240 PRINT"ABOUT HOW ALL THE CANDIDATES YOU"
  29. 245 PRINT"HAVE EVER VOTED FOR ALWAYS LOSE,"
  30. 250 PRINT"SUDDENLY A MAN HITS A LADY OVER"
  31. 255 PRINT"THE HEAD WITH A BILLY CLUB, TAKES"
  32. 260 PRINT"HER PURSE AND DASHES FOR THE RIVER!"
  33. 265 PRINT"WHAT DO YOU DO?"
  34. 270 PRINT:PRINT"IF YOU CHASE THE MUGGER, PRESS(C)"
  35. 280 PRINT:PRINT"IF YOU HELP THE LADY, PRESS(H)."
  36. 290 INPUT"?";C$
  37. 295 IFC$=""THEN GOTO 290
  38. 300 IFC$="C"THENGOTO305
  39. 301 IFC$="H"THENGOTO10000
  40. 305 PRINT"YOU RUN AFTER THE MAN FOR TWO BLOCKS"
  41. 310 PRINT"BEFORE HE STOPS RUNNING. HE STILL"
  42. 315 PRINT"HAS NOT NOTICED YOU. YOU DUCK FOR"
  43. 320 PRINT"COVER AS HE TURNS IN YOUR DIRECTION."
  44. 325 PRINT"NOW YOU GET A GOOD LOOK AT HIM."
  45. 330 PRINT"HE IS IN HIS LATE 20'S, HAS JET"
  46. 335 PRINT"BLACK HAIR, IS ABOUT 6'2'', AND"
  47. 340 PRINT"AND HAS A SCAR FROM NOSE TO MOUTH."
  48. 345 PRINT"AND, MAN, THIS GUY MUST WEIGH AT"
  49. 350 PRINT"LEAST 350 POUNDS!"
  50. 360 PRINT"THE NEXT WEEK, SOME SUSPECTS ARE"
  51. 365 PRINT"TAKEN INTO CUSTODY. YOU ARE CALLED"
  52. 370 PRINT"ON TO IDENTIFY THE MUGGER."
  53. 371 INPUT"PRESS RETURN TO CONTINUE";D$
  54. 372 IFD$=""GOTO373
  55. 373 PRINT"[147]"
  56. 375 PRINT"AMONG THE SIX SUSPECTS IN FRONT OF YOU,"
  57. 380 PRINT"ONE MATCHES YOUR RECOLLECTIONS                  PERFECTLY."
  58. 385 PRINT"EXCEPT...HE HAS NO SCAR! HMMMMM..."
  59. 390 PRINT"PERHAPS IT WAS NOT A SCAR, BUT A"
  60. 395 PRINT"STAIN...OF DIRT, BLOOD, MAYBE"
  61. 400 PRINT"STRAWBERRY JAM. THEN AGAIN..."
  62. 410 PRINT"IF YOU THINK THIS IS THE MAN, PRESS(Y)."
  63. 415 PRINT"IF YOU BELIEVE THE MUGGER HAS A SCAR"
  64. 420 PRINT"AND THIS IS NOT HIM, PRESS(N)."
  65. 430 INPUT"?";E$
  66. 435 IFE$=""THENGOTO430
  67. 440 IFE$="Y"THEN GOTO600
  68. 445 IFE$="N"THENGOTO450
  69. 450 PRINT"[147]              NEWS BULLITEN"
  70. 460 PRINT:PRINTA$", THE SUPPOSED SOLE WITNESS OF"
  71. 465 PRINT"THE MUGGING IN FRONT OF THE CITY COUNCIL"
  72. 470 PRINT"DID NOT IDENTIFY BOB 'GENTLEMAN'"
  73. 480 PRINT"FUDDRUCKER AS THE CRIMINAL."A$" WAS"
  74. 485 PRINT"UNCERTAIN AND SEEMED TO BE CONFUSED"
  75. 490 PRINT"ABOUT THE DESCRIPTION OF FUDDRUCKER"
  76. 500 PRINT"AND ALSO SEEMED RELUCTANT TO IDENTIFY       THE MUGGER."
  77. 505 PRINT"FORTUNATELY, ANOTHER WITNESS WAS LOCATED"
  78. 510 PRINT"AND POSITIVELY IDENTIFIED FUDDRUCKER"
  79. 515 PRINT"AS THE CRIMINAL."
  80. 520 INPUT"PRESS RETURN TO CONTINUE";F$
  81. 525 IFF$=""THENGOTO530
  82. 530 PRINT"WELL, "A$", YOU COULDN'T GIVE ENOUGH"
  83. 535 PRINT"EVIDENCE TO PUT THE CRIMINALS BEHIND         BARS."
  84. 540 PRINT"IN FACT, YOU NEVER EVEN MADE IT TO          COURT!"
  85. 545 PRINT"BETTER LUCK NEXT TIME"
  86. 550 PRINT:PRINT:PRINT:PRINT:INPUT"PLAY AGAIN?(Y/N)";G$
  87. 555 IFG$=""THEN GOTO550
  88. 560 IFG$="N"THEN GOTO 590
  89. 565 IFG$="Y"THEN GOTO10
  90. 590 PRINT:PRINT:PRINT:PRINT"BYE, "A$" , THANKS FOR PLAYING..."
  91. 591 PRINT:PRINT:PRINT:PRINT"                WITNESS!!!"
  92. 592 END
  93. 600 PRINT"[147]":PRINT"'YEP' YOU POINT AT THE MAN.'THAT'S HIM, ALRIGHT!"
  94. 601 INPUT"HIT RETURN";Q$
  95. 602 IFQ$=""THENGOTO605
  96. 605 PRINT"[147]":PRINT"THE NEXT NIGHT YOU TOSS AND TURN IN BED."
  97. 610 PRINT"YOU ARE ACTUALLY GOING TO COURT                    TOMORROW"
  98. 615 PRINT"TO TESTIFY. YOU WONDER IF YOU CAN DO IT..."
  99. 620 INPUT"PRESS RETURN";R$
  100. 625 IFR$=""THENGOTO626
  101. 626 PRINT"[147]":PRINT"YOU MEET THE LAWYER OF THE WOMAN WHO"
  102. 627 PRINT"WAS MUGGED IN THE COURTROOM. HE ASKS"
  103. 628 PRINT"HOW YOU ARE FEELING. THEN HE SAYS,"
  104. 629 PRINT:PRINT:PRINT"'REMEMBER, TELL ONLY WHAT YOU KNOW!'"
  105. 630 PRINT:PRINT"YOU NOD."
  106. 631 PRINT:PRINT:PRINT"'ALL RISE. NOW PRESIDING, THE"
  107. 632 PRINT"HONORABLE JUDGE DOUGLES C. MCMONTON.'"
  108. 633 INPUT"HIT RETURN TO START THE TRIAL.";AD
  109. 634 IFAD$=""THENGOTO20000
  110. 1000 INPUT"PRESS RETURN TO CONTINUE";G$
  111. 1001 PRINT:PRINT:PRINT"YOU ARE PASSING SERENELY BY THE BANK"
  112. 1005 PRINT"WHEN YOU REALIZE IT HAS BEEN THREE YEARS"
  113. 1010 PRINT"SINCE YOUR LAST DEPOSIT. THEN IT DAWNS"
  114. 1015 PRINT"ON YOU THAT YOU HAVE SOME EXTRA CASH IN"
  115. 1020 PRINT"YOUR WALLET. AS YOU START TOWARD THE"
  116. 1025 PRINT"BANK TO MAKE THE DEPOSIT, SOMETHING"
  117. 1030 PRINT"CATCHES YOUR EYE.........."
  118. 1035 INPUT"HIT RETURN";H$
  119. 1036 IFH$=""THENGOTO1040
  120. 1040 PRINT"               THE V01 BAR"
  121. 1041 PRINT"                AND GRILL"
  122. 1045 PRINT"               !!!!!!!!!!!"
  123. 1050 PRINT:PRINT"WOW! THAT MIGHT BE A GOOD PLACE TO"
  124. 1055 PRINT"SPEND SOME EXTRA CASH! BUT WAIT..."
  125. 1060 PRINT"MONEY SHOULD BE WISELY DEPOSITED IN THE BANK!"
  126. 1065 PRINT:PRINT"IF YOU GO TO THE V01, PRESS(V)
  127. 1070 [153]:[153]"IF YOU GO TO THE BANK, PRESS(B)
  128. 1075 INPUT"?";I$
  129. 1080 IFI$=""THEN GOTO1075
  130. 1081 IFI$="V"THEN GOTO 1085
  131. 1082 IFI$="B"THENGOTO 1200
  132. 1085 PRINT"[147]":PRINT:PRINT"                   THE V01!!!"
  133. 1090 PRINT:PRINT:PRINT:PRINT"YOU REALLY LIVE IT UP AT V01!"
  134. 1095 PRINT"YOU HAVE A GOOD TIME, BUT SPEND ALL"
  135. 1100 PRINT"OF YOUR EXTRA MONEY. BUT YOU DO MEET"
  136. 1110 PRINT"THIS REAL CUTE GIRL AND GET HER PHONE"
  137. 1115 PRINT"NUMBER!(GOOD GOIN')
  138. 1120 [133]"PRESS RETURN";J$
  139. 1121 [139]J$[178]""[167][137]1125
  140. 1125 [153]"LOAD":[153]"THE NEXT MORNING YOU READ IN THE PAPER        ABOUT"
  141. 1130 [153]"THE BANK BEING ROBBED, AT 2:09PM."
  142. 1135 [153]:[153]:[153]:[153]:[153]"JUST THE TIME YOU ENTERED THE V01!           GOSH."
  143. 1140 [153]"WHY, IF YOU HAD GONE TO THE BANK, YOU                  COULD'VE BEEN..."
  144. 1145 [153]:[153]"     .....     .....     ....."
  145. 1150 [153]:[153]:[153]:[153]"               THE WITNESS!!!"
  146. 1151 [153]:[153]:[153]:[133]"PRESS RETURN";S$
  147. 1152 [139]S$[178]""[167][137]1155
  148. 1155 [153]"LOAD":[153]"OH WELL, "A$", YOU DIDN'T EVEN SEE A               CRIME!"
  149. 1160 [153]"LET ALONE GO TO COURT."
  150. 1165 [153]:[153]"HOWEVER....."
  151. 1166 [133]"HIT RETURN";K$
  152. 1170 [153]:[153]:[153]:[153]:[153]:[153]:[153]:[153]:[153]:[153]"YOU SITLL HAVE THAT PHONE NUMBER!!!!!!":[137] 550
  153. 1200 [153]"LOAD":[153]"YOU COME IN THE BANK TO FIND EVERY         PERSON'S"
  154. 1205 [153]"NIGHTMARE..."
  155. 1206 [153]:[153]:[153]:[153]"           A LONG LINE!!!"
  156. 1210 [153]:[153]"JUST AS YOU ARE ABOUT TO FALL ASLEEP"
  157. 1215 [153]"IN THE TERRIFYING LINE..."
  158. 1220 [133]"PLEASE HIT RETURN";L$
  159. 1221 [139]L$[178]""[137]1225
  160. 1225 [153]"LOAD          TWO MEN STORM IN..."
  161. 1230 [153]"     AND FIRE GUNS INTO THE CEILING!!!"
  162. 1235 [153]:[153]:[153]"THE MASKED DUO LEAVE THE SAFE ALONE          (PROBABLY SO THAT THE"
  163. 1236 [153]"BANK WON'T PRESS CHARGES). THEN THEY              LINE UP"
  164. 1245 [153]"ALL OF YOU HAPPY BANK GOERS AND ROB"
  165. 1250 [153]"EACH OF YOU IN TURN! FROM YOU, THEY"
  166. 1255 [153]"TAKE YOUR WALLET(WITH YOUR CREDIT CARDS"
  167. 1260 [153]"IN IT!!!) AND YOUR OLD ROLEX(YOU"
  168. 1265 [153]"NOTICE, AS IT IS TAKEN FROM YOU, THAT"
  169. 1270 [153]"IT HAS A LARGE SCRATCH ON THE FACE.)!"
  170. 1275 [133]"HIT RETURN...";M$
  171. 1276 [139]M$[178]""[167][137]1280
  172. 1280 [153]"LOAD":[153]"YOU RETURN HOME FROM THE BANK ALMOST IN"
  173. 1281 [153]"TEARS. WHAT A DAY! PRETTY SOON, YOU"
  174. 1282 [153]"LEARN THAT TWO SUSPECTS HAVE BEEN TAKEN"
  175. 1283 [153]"INTO CUSTODY. WILL YOU PRESS                          CHARGES?(Y/N)"
  176. 1284 [133]"?";T$
  177. 1285 [139]T$[178]""[167][137]1284
  178. 1286 [139]T$[178]"N"[167][137]1288
  179. 1287 [139]T$[178]"Y"[167][137]1300
  180. 1288 [153]"LOAD":[153]"YOU JUST CAN'T BELIEVE IT!!!"
  181. 1289 [153]"WHAN YOU DECIDED NOT TO PRESS CHARGES"
  182. 1290 [153]"YOU THOUGHT SURELY THAT SOMEONE ELSE"
  183. 1291 [153]"WOULD! NOW THEY HAVEN'T GOT ENOUGH"
  184. 1292 [153]"EVIDENCE TO CONVICT THE CRIMINALS!"
  185. 1293 [153]"YOU CAN'T BELIEVE THAT PEOPLE WON'T"
  186. 1294 [153]"AVENGE THEIR OWN CRIMES!"
  187. 1295 [153]:[153]"              GOOD GREIF!!!!!"
  188. 1296 [137]550
  189. 1297 [153]"SINCE THEY HAD MASKS ON, YOU CAN'T"
  190. 1298 [153]"POSITIVELY IDENTIFY THEM! BUT, YOU"
  191. 1299 [153]"DISCOVER THAT THE TWO SUSPECTS WERE"
  192. 1300 [153]"LOAD":[153]"YOU PROCEED WITH PRESSING CHARGES."
  193. 1301 [153]"YOU SOON DISCOVER THAT THE TWO SUSPECTS"
  194. 1302 [153]"WERE FOUND WITH LOTS OF MONEY(BUT"
  195. 1303 [153]"NO WALLETS WERE FOUND), AND VARIOUS"
  196. 1304 [153]"TRINKETS, INCLUDING....."
  197. 1305 [153]:[153]:[153]:[153]"             AN OLD ROLEX..."
  198. 1306 [153]"ON THEIR PERSON."
  199. 1307 [133]"PLEASE PRESS RETURN.";X$
  200. 1308 [139]X$[178]""[167][137]1309
  201. 1309 [153]"LOAD":[153]"YOU HIRE AN ATTOURNEY..."
  202. 1310 [153]:[153]:[153]"AND....."
  203. 1311 [153]:[153]:[153]"OFF YOU GO TO COURT!!!"
  204. 1312 [153]:[153]"'COURT NOW IN SESSION, THE HONORABLE"
  205. 1313 [153]"JUDGE BASIL STOODNICKEL NOW PRESIDING'"
  206. 1314 [153]"YOU NOW SIT NEXT TO YOUR LAWYER IN THE"
  207. 1315 [153]"COURTROOM. YOU GLARE ACROSS THE ROOM"
  208. 1316 [153]"AT THE TWO SUSPECTS. THEY GLOWER BACK"
  209. 1317 [153]"AT YOU. YOUR HIRED LEGEAL EXPERT"
  210. 1318 [153]"WHISPERS TO YOU, 'REMEMBER TELL ONLY            WHAT YOU KNOW!'"
  211. 1319 [133]"HIT RETURN TO START TRIAL...";Y$
  212. 1320 [139]Y$[178]""[167][137]1321
  213. 1321 [153]"LOAD":[153]"BEFORE TOO LONG, YOU ARE CALLED"
  214. 1322 [153]"TO THE STAND. YOU SWEAR THAT YOU WILL"
  215. 1323 [153]"TELL THE TRUTH, THE WHOLE TRUTH, AND"
  216. 1324 [153]"NOTHING BUT THE TRUTH, SO HELP YOU GOD."
  217. 1325 [153]:[153]:[153]"YOUR ATTOURNEY RISES."
  218. 1326 [153]"'NOW, "A$", IS IT TRUE THAT THESE"
  219. 1327 [153]"TWO MEN ARE THE TWO THAT ROBBED YOU"
  220. 1328 [153]"AT THE LAST FEDERAL BANK LAST WEEK?'"
  221. 1329 [153]"YES...OR NOT SURE?"
  222. 1330 [133]"(Y OR N)...";Z$
  223. 1331 [139]Z$[178]""[167][137]1330
  224. 1332 [139]Z$[178]"Y"[167][137]1334
  225. 1333 [139]Z$[178]"N"[167][137]1340
  226. 1334 [153]"LOAD":[153]"WHY DID YOU SAY YES? YOU CAN'T BE SURE"
  227. 1335 [153]"THAT THESE WERE THE TWO CRIMINALS!"
  228. 1336 [153]"THEY WERE WEARING MASKS, REMEMBER?"
  229. 1337 [153]:[153]:[153]:[153]"OH WELL, WE'LL JUST IGNORE THAT FOR NOW..."
  230. 1338 [153]:[153]:[153]"BETTER LUCK NEXT TIME..."
  231. 1339 [137]550
  232. 1340 [153]"LOAD":[153]"' NO FURTHER QUESTIONS'CLOSESAYS YOUR"
  233. 1341 [153]"ATTOURNEY. HE TURNS TO THE DEFENDING"
  234. 1342 [153]"LAWYER...'YOUR WITNESS'. THE MAN"
  235. 1343 [153]"ASKS YOU, AS HE PICKS UP A WATCH"
  236. 1344 [153]"FROM THE TABLE, 'IS THIS THE WATCH"
  237. 1345 [153]"STOLEN FROM YOU?' 'YES.' 'HOW CAN"
  238. 1346 [153]"YOU BE SURE?'"
  239. 1347 [153]:[153]:[153]"BY A SCRATCH ON THE FACE..."
  240. 1348 [153]:[153]"         OR..."
  241. 1349 [153]:[153]:[153]"THE ENGRAVING ON THE BACK?"
  242. 1350 [153]:[153]:[133]"SCRATCH(S) OR ENGRAVING(E)";TY$
  243. 1351 [139]TY$[178]""[167][137]1350
  244. 1352 [139]TY$[178]"E"[167][137]1354
  245. 1353 [139]TY$[178]"S"[167][137]1360
  246. 1354 [153]"LOAD":[153]"THE LAWYER LOOKS AT YOU. THERE IS NO"
  247. 1355 [153]"ENGRAVING ON THIS WATCH!' HE SAYS."
  248. 1356 [153]:[153]:[153]:[153]"HE'S RIGHT, THERE ISN'T. OH WELL..."
  249. 1357 [137]550
  250. 1360 [153]"LOAD":[153]"YOU REPLY, 'THERE'S A SCRATCH ON THE            FACE..."
  251. 1361 [153]"RIGHT...THERE!' 'YES, THERE IS..."
  252. 1362 [153]"INDEED' HE SAYS. NOT LONG AFTER, "
  253. 1363 [153]"THE JEWELER WHO SOLD YOU THE WATCH"
  254. 1364 [153]"IS CALLED TO TESTIFY, AND SAYS THAT,"
  255. 1365 [153]" YES, THIS IS YOUR WATCH. THIS IS"
  256. 1366 [153]"TOO MUCH FOR ONE OF THE SUSPECTS."
  257. 1367 [153]"TO EVERYONE'S SUPRISE, HE JUMPS UP"
  258. 1368 [153]"AND SCREAMS, 'WE DID IT!!! WE ROBBED"
  259. 1369 [153]"ALL THOSE GUYS!!! IT WAS US!!!' JUST"
  260. 1370 [153]"AS HIS ATTOURNEY IS SAYING, 'YOUR"
  261. 1371 [153]"HONOR, MY CLIENTS SIMPLY CANNOT BE"
  262. 1372 [153]"GUILTY!' WOW!"
  263. 1373 [133]"PLEASE PRESS RETURN.";AL$
  264. 1374 [139]AL$[178]""[167][137]1375
  265. 1375 [153]"LOAD":[153]"*****CONGRATULATIONS!*****"
  266. 1376 [153]:[153]:[153]:[153]"YOU HAVE AVENGED A CRIME IN"
  267. 1377 [153]"YOU WERE THE VICTIM!"
  268. 1378 [153]:[153]:[153]:[153]"*****CONGRATULATIONS!*****"
  269. 1379 [137]550
  270. 10000 [153]"YOU RUSH OVER NO THE STUNNED WOMAN."
  271. 10005 [153]"SHE IS DAZED BUT GOING CRAZY OVER"
  272. 10010 [153]"THE STOLEN PURSE ANYHOW. 'OH, NO!'SHE"
  273. 10015 [153]"WAILS. 'I SHALL NEVER SEE THEM AGAIN!'"
  274. 10020 [153]"'MY BILLFOLD, A RED VINYL ONE! AND...AND"
  275. 10025 [153]"A LOCKET WITH L.V.Q. ENGRAVED ON IT..."
  276. 10030 [153]"AND...' SHE STOPS SHORT, AND FALLS"
  277. 10035 [153]"TO THE GROUND."
  278. 10040 [133]"PRESS RETURN";N$
  279. 10045 [153]:[153]:[153]:[153]"SUDDENLY YOU RECOGNIZE"
  280. 10050 [153]"THIS PERSON. SHE DROPPED THAT LOCKET"
  281. 10055 [153]"SHE WAS SCREAMING ABOUT JUST YESTERDAY"
  282. 10060 [153]"IN THE GROCERY STORE. YOU PICKED IT"
  283. 10065 [153]"UP, TOOK A GOOD LOOK AT IT, AND GAVE IT"
  284. 10070 [153]"TO HER. YOU SHAKE HER. SHE DOESN'T MOVE..."
  285. 10075 [153]:[153]:[133]"PRESS RETURN TO CONTINUE";O$
  286. 10080 [153]"LOAD":[153]"YOU ARE SITTING IN THE WAITING ROOM"
  287. 10085 [153]"OF THE HOSPITAL. YOU ARE WORRIED ABOUT"
  288. 10090 [153]"THE LADY. NOW THE DOCTOR COMES OUT"
  289. 10095 [153]"WITH A WORRIED LOOK ON HIS FACE."
  290. 10100 [153]"SHE'S GONE INTO SHOCK. OF COURSE"
  291. 10101 [153]"[SIGH] SHE WON'T BE ABLE TO TESTIFY"
  292. 10102 [153]"AGAINST THE SUSPECT WHO WAS JUST"
  293. 10103 [153]"TAKEN INTO CUSTODY.'"
  294. 10115 [153]"YOU PONDER THE SITUATION. YOU MAY BE"
  295. 10120 [153]"ABLE TO GIVE ENOUGH EVIDENCE TO AVENGE"
  296. 10125 [153]"THIS RIDICULOUS FILTH CALLED CRIME."
  297. 10130 [153]"THAT'S WHEN THE DOCTOR ASKS IF YOU"
  298. 10135 [153]"ARE WILLING TO BE CALLED AS A WITNESS"
  299. 10140 [153]"IN COURT."
  300. 10146 [153]"IF YOU REFUSE TO APPEAR IN COURT             PRESS(N)."
  301. 10147 [153]"IF YOU AGREE TO APPEAR IN COURT             PRESS(Y)."
  302. 10148 [133]"?";P$
  303. 10149 [139]P$[178]""[167][137]10148
  304. 10150 [139]P$[178]"N"[167][137]10152
  305. 10151 [139]P$[178]"Y"[167][137]10200
  306. 10152 [153]"LOAD":[153]"THE NEXT FEW NIGHTS YOU LIE AWAKE IN"
  307. 10153 [153]"BED, RIDDLED WITH GUILT. THE EVENTS"
  308. 10154 [153]"OF THE PAST FEW DAYS LAY LUCID IN"
  309. 10155 [153]"YOUR MIND. REFUSING TO BE A WITNESS,"
  310. 10156 [153]" NOT ENOUGH EVIDENCE TO JAIL THE "
  311. 10157 [153]"MUGGER, THAT POOR WOMAN WAKING UP"
  312. 10158 [153]"FROM SHOCK ONLY TO FIND THAT HER"
  313. 10159 [153]"MUGGING GOES UNAVENGED!"
  314. 10160 [153]:[153]:[153]:[153]"WELL, IT WAS UP TO YOU."
  315. 10161 [153]:[153]:[153]"DID YOU MAKE THE RIGHT CHOICE?"
  316. 10162 [137]550
  317. 10163 [137] 550
  318. 10200 [153]"LOAD":[153]"THE CONCERNED DOCTOR CONTACTS THE            ATTOURNEY"
  319. 10201 [153]"OF THE VICTIM. HE SAYS HE WILL USE YOU"
  320. 10202 [153]"AS A CHIEF WITNESS."
  321. 10203 [133]"RETURN TO CONTINUE...";V$
  322. 10204 [139]V$[178]""[167][137] 10205
  323. 10205 [153]"LOAD":[153]"YOU SIT TIRED AND FIDGETING IN THE COURTROOM."
  324. 10206 [153]"YOU LOOK OVER AT THE JURY BOX. ONE JUROR"
  325. 10207 [153]"IS LABORING HARD ON A CROSSWORD PUZZLE."
  326. 10208 [153]"ANOTHER IS GRADING PAPERS FROM THE CLASS"
  327. 10209 [153]"HE TEACHES WHEN HE'S NOT ON A JURY."
  328. 10210 [153]"THE DEFENDING LAWYER HAS BEEN ADDRESSING"
  329. 10211 [153]"THE COURT FOR OVER AN HOUR! ONLY"
  330. 10212 [153]"THE JUDGE SEEMS TO BE LISTENING, TAKING"
  331. 10213 [153]"IN EVERY WORD THE ATTOURNEY SAYS."
  332. 10214 [153]"FINALLY, THE SPEECH ENDS AND YOUR LAWYER"
  333. 10215 [153]"RISES. YOU ARE CALLED TO THE STAND."
  334. 10216 [153]"YOUR LAWYER ASKS, 'NOW, "A$", DID"
  335. 10217 [153]"THAT MAN, BOB 'GENTLEMAN' FUDDRUCKER,"
  336. 10218 [153]"USE THIS BASEBALL BAT TO ROB LANA             LANCASTER?'"
  337. 10219 [133]"Y/N?";AN$
  338. 10220 [139]AN$[178]""[167][137]10219
  339. 10221 [139]AN$[178]"Y"[167][137]10223
  340. 10222 [139]AN$[178]"N"[167][137]10230
  341. 10223 [153]"LOAD":[153]"A BASEBALL BAT?! NO, IT WASN'T A BAT!"
  342. 10224 [153]:[153]:[153]:[153]"BETTER LUCK NEXT TIME."
  343. 10225 [137]550
  344. 10230 [153]"LOAD":[153]"'NO,' YOU SAY, 'IT WAS A CLUB. "
  345. 10231 [153]"YOUR LAWYER THEN ASKS, 'NOW IS THIS"
  346. 10232 [153]"THE LOCKET THAT WAS STOLEN FROM                    MRS. LANCASTER?'"
  347. 10233 [153]"YOU TAKE A GOOD LOOK AT THE LOCKET"
  348. 10234 [153]"AND SEE THE ENGRAVING T.J.B. ON THE             BACK."
  349. 10235 [133]"IS THIS THE LOCKET?(Y/N)";AO$
  350. 10236 [139]AO$[178]""[167][137]10235
  351. 10237 [139]AO$[178]"Y"[167][137]10239
  352. 10238 [139]AO$[178]"N"[167][137]10245
  353. 10239 [153]"LOAD":[153]"UH, NO, THAT'S THE WRONG ENGRAVING...           PLEASE TRY AGAIN!"
  354. 10240 [137]550
  355. 10245 [153]"LOAD":[153]"'NO,' YOU SAY, 'THIS ISN'T THE LOCKET."
  356. 10246 [153]"THAT'S THE WRONG ENGRAVING!'"
  357. 10247 [153]"'OOPS!' SAYS YOUR LAWYER SHEEPISHLY."
  358. 10248 [153]"'THIS IS MY WIFE'S LOCKET!' HE SITS BACK DOWN."
  359. 10249 [153]"THE DEFENDING ATTOURNEY RISES. 'NOW, "A$", BEFORE"
  360. 10250 [153]"I ASK YOU IF THIS IS THE RIGHT LOCKET,  HE SAYS, HOLDING UP A LOCKET,"
  361. 10251 [153]"'BEFORE I ASK YOU IF THIS IS THE LOCKET, WHAT IS THE ENGRAVING ON THE"
  362. 10252 [153]"LOCKET?'"
  363. 10253 [133]"HIT RETURN";AP$
  364. 10254 [139]AP$[178]""[167][137]10255
  365. 10255 [153]"LOAD":[153]"PLEASE ENTER THE ENGRAVING IN THE FORMAT OF:"
  366. 10256 [153]:[153]:[153]:[153]"X.X.X.[LETTER, PERIOD, LETTER, PERIOD, LETTER, PERIOD"
  367. 10257 [153]:[153]:[153]
  368. 10258 [133]"ENGRAVING:";AQ$
  369. 10259 [139]AQ$[178]"L.V.Q."[167][137]10265
  370. 10260 [137]10261
  371. 10261 [153]"LOAD":[153]"SORRY, WRONG ENGRAVING!"
  372. 10262 [153]:[153]:[153]:[153]"BETTER LUCK NEXT TIME!"
  373. 10263 [137]550
  374. 10265 [153]"LOAD":[153]"'YES...YES, THAT'S THE ENGRAVING!' SAYS      THE SHAKEN LAWYER."
  375. 10266 [153]"THIS REALLY SPOOKS THE SUSPECT, WHO         SCREAMS'I ADMIT! I"
  376. 10267 [153]"DID IT!!!'"
  377. 10268 [133]"PRESS RETURN TO CONTINUE";TY$
  378. 10269 [139]TY$[178]""[167][137]10270
  379. 10270 [153]"LOAD":[153]"*****CONGRATULATIONS!*****"
  380. 10271 [153]:[153]:[153]:[153]"YOU HAVE STOPPED A CRIMINAL FROM        SPREADING HIS FILTH!"
  381. 10272 [153]:[153]:[153]:[153]"*****CONGRATULATIONS!*****"
  382. 10273 [137]550
  383. 20000 [153]"LOAD":[153]"NOT TOO MUCH LATER YOU ARE CALLED TO"
  384. 20001 [153]"THE STAND. YOUR LAWYER RISES."
  385. 20002 [153]"' NOW, "A$", IS THAT THE MAN YOU"
  386. 20003 [153]"SAW ATTACK A MRS. LANA LANCASTER"
  387. 20004 [153]"LAST WEEK IN FRONT OF THE COUNCIL"
  388. 20005 [153]"BUILDING?'"
  389. 20006 [153]:[153]"YOU CAST A GAZE AT THE MAN. HE"
  390. 20007 [153]"HAS BLACK HAIR, BUT SEEMS TO WEIGH LESS."
  391. 20008 [153]"HE COULD'VE LOST THE WEIGHT BEFORE"
  392. 20009 [153]"THE TRIAL..."
  393. 20010 [153]"' IS THIS HE?'"
  394. 20011 [133]"Y/N?";AE$
  395. 20012 [139]AE$[178]""[167][137]20011
  396. 20013 [139]AE$[178]"N"[167][137]20015
  397. 20014 [139]AE$[178]"Y"[167][137]20020
  398. 20015 [153]"NO?!NO?! WHY DID YOU SAY NO?! ISN'T             THAT HIM?"
  399. 20016 [153]"OH WELL, WE ALL MAKE MISTAKES."
  400. 20017 [153]:[153]:[153]:[153]"BETTER LUCK NEXT TIME..."
  401. 20018 [137]550
  402. 20020 [153]"LOAD":[153]"'YEP, THAT'S HIM!' YOU SAY. THEN YOU "
  403. 20021 [153]"ENJOY WATCHING THE SUSPECT FIDGET IN"
  404. 20022 [153]"IN HIS SEAT. YOUR LAWYER SPEAKS AGAIN."
  405. 20023 [153]"'AND', HE SAYS AS HE HOLDS UP A"
  406. 20024 [153]"BASEBALL BAT, 'WAS THIS THE WEAPON"
  407. 20025 [153]"USED TO ROB MRS. LANCASTER?'"
  408. 20026 [133]"Y/N?";AF$
  409. 20027 [139]AF$[178]""[167][137]20026
  410. 20028 [139]AF$[178]"Y"[167][137]20030
  411. 20029 [139]AF$[178]"N"[167][137]20035
  412. 20030 [153]"LOAD":[153]"A BASEBALL BAT?! A BASEBALL BAT?!"
  413. 20031 [153]"HUH? I THOUGHT IT WAS SOMETHING ELSE..."
  414. 20032 [153]"BETTER LUCK NEXT TIME."
  415. 20033 [137]550
  416. 20035 [153]"LOAD":[153]"'NO, NO, IT WAS SOMETHING ELSE.' YOU SAY."
  417. 20036 [153]"'CAN YOU TELL THE COURT WHAT THE "
  418. 20037 [153]"WEAPON WAS?' 'WELL...'"
  419. 20038 [153]:[153]:[153]"WAS IT A BILLY CLUB..."
  420. 20039 [153]:[153]:[153]"      OR"
  421. 20040 [153]:[153]:[153]"WAS IT THE HANDLE OF A PISTOL?"
  422. 20041 [133]"CLUB(C) OR PISTOL(P)";AG$
  423. 20042 [139]AG$[178]""[167][137]20041
  424. 20043 [139]AG$[178]"P"[167][137]20045
  425. 20044 [139]AG$[178]"C"[167][137]20050
  426. 20045 [153]"LOAD":[153]"YOUR LAWYER GROANS."
  427. 20046 [153]:[153]:[153]:[153]"OOOPS!"
  428. 20047 [153]:[153]:[153]:[153]"I THINK YOU'VE MADE A MISTAKE!"
  429. 20048 [153]:[153]:[153]:[153]"AT LEAST YOU ALMOST WON THE GAME!"
  430. 20049 [137]550
  431. 20050 [153]"LOAD":[153]"''IT WAS A CLUB.' YOUR ATTOURNEY"
  432. 20051 [153]"RETURNS TO HIS SEAT. THE DEFENDING          LAWYER"
  433. 20052 [153]"RISES. 'TELL ME, DID THAT MAN' HE"
  434. 20053 [153]"POINTS TO THE SUSPECT,'ACTUALLY HIT"
  435. 20054 [153]"MRS. LANCASTER OVER THE HEAD WITH"
  436. 20055 [153]"A CLUB OR SIMPLY THREATEN TO DO SO?'"
  437. 20056 [133]"THREAT(T) OR HIT(H)";AH$
  438. 20057 [139]AH$[178]""[167] [137]20056
  439. 20058 [139]AH$[178]"T"[167][137] 20060
  440. 20059 [139]AH$[178]"H"[167][137]20065
  441. 20060 [153]"LOAD":[153]"'DID HE REALLY JUST THREATEN?"
  442. 20061 [153]"HE SAYS SARCASTICALLY'JUST THREATEN?         EVERYINE SAYS HE HIT HER."
  443. 20062 [153]"THAT HE HIT HER! YOUR HONOR, HOW CAN WE COLLECT EVIDENCE FROM WITNESSES"
  444. 20063 [153]"ARE NOT SURE ABOUT THE FACTS?' WELL,          BETTER LUCK NEXT TIME."
  445. 20064 [137]550
  446. 20065 [153]"LOAD":[153]"'OH, HE HIT HER ALRIGHT!"
  447. 20066 [153]:[153]:[153]"'NO FURTHER QUESTIONS.'"
  448. 20067 [133]"PLEASE HIT RETURN";AI$
  449. 20068 [153]:[153]:[153]"MANY OTHER WITNESSES ARE CALLED TO THE"
  450. 20069 [153]"STAND. ALL AGREE THAT THE MUGGER,"
  451. 20070 [153]"WHOSE NAME IS BOB 'GENTLEMAN'                   FUDDRUCKER,"
  452. 20071 [153]"ROBBED THE LADY OF HER PURSE. MANY"
  453. 20072 [153]"SAW FUDDRUCKER THE NEXT DAY WITH"
  454. 20073 [153]"'SUDDEN BIG BUCKS THAT A MAN LIKE"
  455. 20074 [153]"HIM CAN'T GET HONESTLY.' THE JURORS"
  456. 20075 [153]"CONFER..."
  457. 20076 [133]"HIT RETURN TO VIEW THE JURY'S VERDICT";AJ$
  458. 20077 [139]AJ$[178]""[167][137]20078
  459. 20078 [153]"LOAD"
  460. 20079 [153]"   G  U  I  L  T  Y  !  !  !"
  461. 20080 [153]:[153]:[153]:[153]"*****CONGRATULATIONS!*****"
  462. 20081 [153]:[153]:[153]:[153]"YOU HAVE JUST AVENGED A CRIME!"
  463. 20082 [153]" THANKS TO YOU, IT IS NOW SAFE TO WALK         THE STREETS!"
  464. 20083 [153]:[153]:[153]:[153]"*****CONGRATULATIONS!*****"
  465. 20084 [137]550
  466.